DigitalVision: Cats & Dogs/DigitalVision: Cats & Dogs - Disc 1.iso/pc/s_saver/dv_onlin.exe/dv_onlin.dcr/Internal_6_shadow script.ls

Text File | 2000-07-28 | 209 b | 13 lines

property pSprite

on beginSprite me
  pSprite = sprite(me.spriteNum)
end

on shadow me, shadowrect
  newrect = (shadowrect / 1.5) + 40
  if pSprite.rect <> newrect then
    pSprite.rect = newrect
  end if
end